d-ch3.Rmd
library(propre.rpls)
#> Error in get(paste0(generic, ".", class), envir = get_method_env()) :
#> object 'type_sum.accel' not found
ggplot2::theme_set(gouvdown::theme_gouv(plot_title_size = 14, subtitle_size = 12, base_size = 10, caption_size = 10) + ggplot2::theme(plot.caption.position = "plot"))
indicateurs_rpls_ref <- lire_rpls_exemple() %>%
dplyr::filter(Zone_ref)La fonction creer_verbatim_3() produit l’intertitre, les
commentaires et l’encadre automatiques du chapitre 3. Le résultat est
une liste nommée comprenant quatre items. On accède au texte produit par
la fonction en utilisant leur nom (“intertitre” “commentaires” et
“encadre_titre” et “encadre_paragraphe”).
creer_verbatim_3(data = indicateurs_rpls_ref, annee = 2023)[["intertitre"]]
creer_verbatim_3(data = indicateurs_rpls_ref, annee = 2023)[["commentaires"]]
creer_verbatim_3(data = indicateurs_rpls_ref, annee = 2023)[["encadre_titre"]]
creer_verbatim_3(data = indicateurs_rpls_ref, annee = 2023)[["encadre_paragraphe"]]Exemple d’utilisation ensuite :
Entre le 2 janvier 2022 et le 1er janvier 2023, 316 logements sociaux ont été mis en service dans la région Corse. Il s’agit du deuxième plus important volume constaté sur les cinq dernières années. Parmi ces mises en service, 98,7 % sont des logements neufs, c’est-à-dire construits par l’organisme (57,0 %) ou acquis en vente en l’état futur d’achèvement (41,8 %). Les logements mis en service peuvent être également des logements existants acquis en dehors du parc social. Les acquisitions dans le parc privé représentent 1,3 % des mises en service en 2022 ; 100,0 % d’entre elles se font avec des travaux de réhabilitation.
Les mouvements du parc en 2022
Dans la région Corse, le nombre de logements sociaux est de 15 837 au 1er janvier 2023 contre 15 599 au 1er janvier 2022. Au cours de l’année 2022, 316 logements sociaux ont été mis en service dans la région. Dans le même temps, 80 logements ont été vendus, et 2 logements ont changé d’usage ou ont été restructurés.
La fonction creer_graphe_3_1() produit le graphique en
barres représentant le nombre de logements mis en service selon le type
de bailleur sur 5 années (de 4 années avant l’année choisie jusqu’à
l’année choisie).
Compléter le paramètre titre si vous souhaitez modifier
le titre par défaut. Pour insérer un saut de ligne à votre titre,
ajouter la chaîne de caractère \n à l’endroit du saut
souhaité.
Renseignez le paramètre note_de_lecture_defaut à FALSE
si vous ne voulez pas afficher la note de lecture par défaut (située au
dessus de la source).
Compléter le paramètre note_de_lecture si vous souhaitez
compléter ou remplacer la note de lecture par défaut.
Pour le titre et la note de lecture attention aux accents et à l’encodage.
creer_graphe_3_1(data = indicateurs_rpls_ref, annee = 2023)[["viz"]]La fonction creer_graphe_3_2() produit le graphique en
barres représentant le nombre de logements entrés dans le patrimoine des
bailleurs selon qu’ils sont situés en zone QPV ou non (pour l’année
choisie).
Compléter le paramètre titre si vous souhaitez modifier
le titre par défaut. Pour insérer un saut de ligne à votre titre,
ajouter la chaîne de caractère \n à l’endroit du saut
souhaité.
Compléter le paramètre note_de_lecture si vous souhaitez
en ajouter une avant les sources.
Pour le titre et la note de lecture attention aux accents et à l’encodage.
creer_graphe_3_2(data = indicateurs_rpls_ref, annee = 2023)[["viz"]]La fonction creer_tableau_3_1() produit le tableau :
en lignes : les départements / région / France (lignes différentes selon si DOM ou métropole)
en colonnes :
Mettre le paramètre epci = TRUE si vous souhaitez les
données des epci dans le tableau.
Mettre le paramètre add_scroll = TRUE si vous souhaitez
ajouter un scroll à votre tableau pour plus de lisibilité. (voir un
exemple de rendu dans l’article b- Chapitre 1, fonction
creer_tableau_1_1())
Compléter le paramètre titre si vous souhaitez modifier
le titre par défaut. Pour insérer un saut de ligne à votre titre,
ajouter la chaîne de caractère <br> à l’endroit du
saut souhaité.
Compléter le paramètre note_de_lecture si vous souhaitez
en ajouter une avant les sources.
Pour le titre et la note de lecture attention aux accents et à l’encodage.
creer_tableau_3_1(data = indicateurs_rpls_ref, annee = 2023, epci = FALSE)[["viz"]]
#> Joining with `by = join_by(TypeZone, Zone, CodeZone)`| Zone | Logements sociaux au 01/01/2023 | Logements sociaux au 01/01/2022 | Mises en service | Ventes * | Démolitions | Sorties pour un autre motif ** | Rattrapages et omis- sions *** | Transferts à un autre bail- leur **** |
|---|---|---|---|---|---|---|---|---|
| France métropolitaine | 5 141 673 | 5 092 505 | 65 574 | 12 181 | 11 232 | 4 657 | 11 664 | 10 204 |
| France de province | 3 763 013 | 3 728 480 | 49 229 | 10 745 | 9 585 | 3 980 | 9 614 | 3 624 |
| Corse | 15 837 | 15 599 | 316 | 80 | 0 | 2 | 4 | 0 |
| Corse-du-Sud | 6 752 | 6 613 | 218 | 78 | 0 | 1 | 0 | 0 |
| Haute-Corse | 9 085 | 8 986 | 98 | 2 | 0 | 1 | 4 | 0 |
|
* Ventes à l’occupant et autres ventes. ** Logements fusionnés, logements scindés ou logements sortis pour autre motif. *** Écarts observés entre les déclarations des bailleurs sociaux entre 2022 et 2023, tant vis-à-vis des sorties que des entrées dans le parc social. **** Les logements transférés d’un bailleur à un autre restent actifs dans le répertoire. Source : SDES, RPLS au 1er janvier 2023 |